home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
LOGIC Apps
/
Logic-APPLE_II_APPS.iso
/
mac
/
LOGIC Apple II 5.25" Library - ProDOS
/
PRO023.dsk
/
QS7.bas
< prev
next >
Wrap
BASIC Source File
|
2012-02-16
|
728b
|
14 lines
0 TEXT : HOME
9 PRINT : PRINT : PRINT
10 PRINT "In the absence of the forces of friction, an elephant and an apple are thrown off a fifty story building. What would happen?"
12 PRINT : PRINT
14 PRINT " a) The elephant eats the apple for its last meal."
15 PRINT
16 PRINT " b) Both would land on the second story balcony at the same time."
17 PRINT
18 PRINT " c) Both would make a mess on the second story balcony."
19 PRINT
20 PRINT " d) Maybe all of the above."
30 PRINT : GET KY$: PRINT "That's correct! You're pretty smart. The End."
40 FOR I = 0 TO 1000: NEXT : PRINT CHR$(4);"run fin"
50 END